﻿Imports BusinessEntity
Imports DataAccess
Public Class ClienteBL

    Dim ClienteDA As New ClienteDA

    Public Function RegistrarCliente(ByVal Cliente As ClienteBE) As DataSet
        Return ClienteDA.Registrar(Cliente)
    End Function

    Public Function Listar(ByVal Nombre As String) As DataSet
        Return ClienteDA.Listar(Nombre)
    End Function


End Class
